home *** CD-ROM | disk | FTP | other *** search
/ PC World 2006 February / PCWorld_2006-02_cd.bin / software / vyzkuste / tnt / tnt.exe / {app} / plugins / Startmenu Speed.ttp < prev    next >
INI File  |  2005-03-15  |  2KB  |  68 lines
  1. [SETTINGS]
  2. Category=Windows Tweaks::Start Menu and Taskbar::Menu Show Delay
  3. Caption=Change the Menu Show Speed
  4. version=1.0
  5. #=By defaut, Windows delays menus before they are shown ; but for regular users, this can be annoying. 
  6. #=Use this tweak to speed-up the menu display or to delay it more.
  7. #=\nSelect the 'No Delay' option to display menu instantly.
  8. //#=The default value for this is 400 ms, the longest time is 65535 ms (which means menu will wait for a click) and the shortest possible value is 1 ms.
  9. #=\n
  10.  
  11. Author=
  12. GROUP=1
  13.  
  14.  
  15. [INTERFACE]
  16. type=multi
  17. TYPE0=droplist
  18. Text0=Delay (milliseconds)
  19. 'style0=1,65535
  20.  
  21. [EXPORT]
  22.  
  23. val0="HKCU\Control Panel\Desktop\MenuShowDelay"
  24.  
  25. [SCRIPT]
  26.  
  27. Sub OnInit() 
  28.  Dim i
  29.  i=RegReadValue("HKCU\Control Panel\Desktop\MenuShowDelay")
  30.  SetItemTextEx 0,0, "Current ("& i &" ms)"
  31.  SetItemTextEx 0,1,"No Delay (1 ms)"
  32.  SetItemTextEx 0,2,"Faster (200 ms)"
  33.  SetItemTextEx 0,3,"Windows Default (400 ms)"
  34.  SetItemTextEx 0,4, "Slow (600 ms)"
  35.  SetItemTextEx 0,5, "Slower (800 ms)"
  36.  SetItemTextEx 0,6, "Slowest (999 ms)"
  37.  SetItemTextEx 0,7, "Wait for click (65535 ms)"
  38.  
  39. SetCurSel 0,0
  40.  
  41. End Sub
  42.  
  43. Sub OnApply(x,y)
  44.  Dim i
  45.  i=GetCurSel(0)
  46. if i=0 then 'no change
  47. elseif i=1 then ' first item (no delay) 1 ms
  48. RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","1",1
  49. elseif i=2 then 'faster 200
  50. RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","200",1
  51. elseif i=3 then 'default 400
  52. RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","400",1
  53. elseif i=4 then 'slow 600
  54. RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","600",1
  55. elseif i=5 then 'slower 800
  56.    RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","800",1
  57. elseif i=6 then 'slowest 999
  58.     RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","999",1
  59. else 'Show on click 65535
  60.    RegWriteValue "HKCU\Control Panel\Desktop\MenuShowDelay","65535",1
  61. end if
  62.  
  63.  
  64.  NotifySettingChange 0
  65.  Call Restart()
  66.  
  67. End Sub
  68.